10 CLEAR,39959:PRINT"PATIENCE S.V.P.":FORT=0TO758:A=PEEK(T+&HFC9E):B=A/2:C=BORA:POKET+40159,C:NEXTT:FORT=39960TO39988:READA$:POKET,VAL("&H"+A$):NEXT:POKE&H2236,&H7E:POKE&H2237,&H9C:POKE&H2238,&H18:POKE&H2239,&H39
20 CLS:SCREEN7,0:LOCATE0,2,0:FORD=0TO1:FORA=0TO1:FORB=0TO1:ATTRBA,B:PRINT"THOMSON MO5":ATTRB0,0:PRINT:NEXTB:NEXTA:PRINT:AUTO:LINE(0,90)-(319,90):NEXTD:DATAB6,20,74,81,DF,27,0B,86,9C,B7,20,73,86,DF,B7,20,74,39,86,FC,B7,20,73,86,9E,B7,20,74,39
30 REM . CE DEULIGNE PERMET D'ECRIRE EN CARACTERE GRAS , POUR CELA IL FAUT TAPEZ 'AUTO' EN DIRECT OU DANS UN PROGRAMME BASIC .     . MISE EN ROUTE CARACTERES GRAS ===>'AUTO'.ARRET==> DE NOUVEAU 'AUTO'